package OpenID::Tester::Test::OPCaps;
use strict;
use base 'OpenID::Tester::Test';

sub needed_op_caps { () }
sub needed_rp_caps { () }

sub needs_op { 1 }

sub des {
    "Tests that OP base URL returns a capabilities page at /caps";
}

sub run {
    my $self = shift;
    my $caps = $self->tester->op_caps;
    return !!$caps;
}

1;
